home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •The School House• / I Ching ••• / I Ching еее.rsrc / CODE_1_Main.txt < prev    next >
Text File  |  1988-10-21  |  63KB  |  1,161 lines
  1. # near model CODE resource
  2. # jump table entries: 0-4 (5 of them)
  3. export_1:
  4. 00000000  2F02                     move.l     -[A7], D2
  5. 00000002  A9F4                     syscall    ExitToShell
  6. 00000004  241F                     move.l     D2, [A7]+
  7. 00000006  4E75                     rts
  8. fn00000008:
  9. 00000008  4E56 FFEC                link       A6, -0x0014
  10. 0000000C  48E7 2020                movem.l    -[A7], D2,A2
  11. 00000010  45ED 004A                lea.l      A2, [A5 + 0x4A /* export_5 */]
  12. 00000014  2F0A                     move.l     -[A7], A2
  13. 00000016  A9F1                     syscall    UnloadSeg
  14. 00000018  486D FF6E                pea.l      [A5 - 0x92]
  15. 0000001C  A86E                     syscall    InitGraf
  16. 0000001E  A8FE                     syscall    InitFonts
  17. 00000020  A912                     syscall    InitWindows
  18. 00000022  A930                     syscall    InitMenus
  19. 00000024  A9CC                     syscall    TEInit
  20. 00000026  45ED 002A                lea.l      A2, [A5 + 0x2A /* export_1 */]
  21. 0000002A  2F0A                     move.l     -[A7], A2
  22. 0000002C  A97B                     syscall    InitDialogs
  23. 0000002E  A850                     syscall    InitCursor
  24. 00000030  42A7                     clr.l      -[A7]
  25. 00000032  2F3C FFFF FFFF           move.l     -[A7], 0xFFFFFFFF
  26. 00000038  4EBA 07B6                jsr        [PC + 0x7B6 /* 000007F0 */]
  27. 0000003C  4EBA 0046                jsr        [PC + 0x46 /* 00000084 */]
  28. 00000040  508F                     addq.l     A7, 8
  29. label00000042:
  30. 00000042  558F                     subq.l     A7, 2
  31. 00000044  3F3C FFFF                move.w     -[A7], 0xFFFF
  32. 00000048  486E FFEC                pea.l      [A6 - 0x14]
  33. 0000004C  A970                     syscall    GetNextEvent
  34. 0000004E  7000                     moveq.l    D0, 0x00
  35. 00000050  101F                     move.b     D0, [A7]+
  36. 00000052  1000                     move.b     D0, D0
  37. 00000054  67EC                     beq        -0x12 /* 00000042 */
  38. 00000056  302E FFEC                move.w     D0, [A6 - 0x14]
  39. 0000005A  5340                     subq.w     D0, 1
  40. 0000005C  66E4                     bne        -0x1A /* 00000042 */
  41. 0000005E  486E FFFC                pea.l      [A6 - 0x4]
  42. 00000062  486E FFF6                pea.l      [A6 - 0xA]
  43. 00000066  4EBA 07E8                jsr        [PC + 0x7E8 /* 00000850 */]
  44. 0000006A  508F                     addq.l     A7, 8
  45. 0000006C  5340                     subq.w     D0, 1
  46. 0000006E  66D2                     bne        -0x2C /* 00000042 */
  47. 00000070  486E FFF6                pea.l      [A6 - 0xA]
  48. 00000074  4EBA 0768                jsr        [PC + 0x768 /* 000007DE */]
  49. 00000078  588F                     addq.l     A7, 4
  50. 0000007A  2F00                     move.l     -[A7], D0
  51. 0000007C  4EBA 002E                jsr        [PC + 0x2E /* 000000AC */]
  52. 00000080  588F                     addq.l     A7, 4
  53. 00000082  60BE                     bra        -0x40 /* 00000042 */
  54. fn00000084:
  55. 00000084  2F02                     move.l     -[A7], D2
  56. 00000086  598F                     subq.l     A7, 4
  57. 00000088  3F3C 0001                move.w     -[A7], 0x1
  58. 0000008C  A9BF                     syscall    GetRMenu
  59. 0000008E  201F                     move.l     D0, [A7]+
  60. 00000090  2F00                     move.l     -[A7], D0
  61. 00000092  4267                     clr.w      -[A7]
  62. 00000094  A935                     syscall    InsertMenu
  63. 00000096  598F                     subq.l     A7, 4
  64. 00000098  3F3C 0002                move.w     -[A7], 0x2
  65. 0000009C  A9BF                     syscall    GetRMenu
  66. 0000009E  201F                     move.l     D0, [A7]+
  67. 000000A0  2F00                     move.l     -[A7], D0
  68. 000000A2  4267                     clr.w      -[A7]
  69. 000000A4  A935                     syscall    InsertMenu
  70. 000000A6  A937                     syscall    DrawMenuBar
  71. 000000A8  241F                     move.l     D2, [A7]+
  72. 000000AA  4E75                     rts
  73. fn000000AC:
  74. 000000AC  4E56 FFEC                link       A6, -0x0014
  75. 000000B0  48E7 3800                movem.l    -[A7], D2,D3,D4
  76. 000000B4  262E 0008                move.l     D3, [A6 + 0x8]
  77. 000000B8  558F                     subq.l     A7, 2
  78. 000000BA  2F03                     move.l     -[A7], D3
  79. 000000BC  A86A                     syscall    HiWord
  80. 000000BE  301F                     move.w     D0, [A7]+
  81. 000000C0  3800                     move.w     D4, D0
  82. 000000C2  558F                     subq.l     A7, 2
  83. 000000C4  2F03                     move.l     -[A7], D3
  84. 000000C6  A86B                     syscall    LoWord
  85. 000000C8  301F                     move.w     D0, [A7]+
  86. 000000CA  3200                     move.w     D1, D0
  87. 000000CC  3004                     move.w     D0, D4
  88. 000000CE  0C40 0001                cmpi.w     D0, 0x1
  89. 000000D2  6D00 01FA                blt        +0x1FC /* 000002CE */
  90. 000000D6  6E02                     bgt        +0x4 /* 000000DA */
  91. 000000D8  600A                     bra        +0xC /* 000000E4 */
  92. label000000DA:
  93. 000000DA  5540                     subq.w     D0, 2
  94. 000000DC  6600 01F0                bne        +0x1F2 /* 000002CE */
  95. 000000E0  6000 00BC                bra        +0xBE /* 0000019E */
  96. label000000E4:
  97. 000000E4  3001                     move.w     D0, D1
  98. 000000E6  5340                     subq.w     D0, 1
  99. 000000E8  6600 00B0                bne        +0xB2 /* 0000019A */
  100. 000000EC  486E FFFC                pea.l      [A6 - 0x4]
  101. 000000F0  A874                     syscall    GetPort
  102. 000000F2  598F                     subq.l     A7, 4
  103. 000000F4  3F3C 00FF                move.w     -[A7], 0xFF
  104. 000000F8  42A7                     clr.l      -[A7]
  105. 000000FA  2F3C FFFF FFFF           move.l     -[A7], 0xFFFFFFFF
  106. 00000100  A97C                     syscall    GetNewDialog
  107. 00000102  201F                     move.l     D0, [A7]+
  108. 00000104  2600                     move.l     D3, D0
  109. 00000106  2F03                     move.l     -[A7], D3
  110. 00000108  3F3C 0001                move.w     -[A7], 0x1
  111. 0000010C  486E FFF6                pea.l      [A6 - 0xA]
  112. 00000110  486E FFF8                pea.l      [A6 - 0x8]
  113. 00000114  486D FE1C                pea.l      [A5 - 0x1E4]
  114. 00000118  A98D                     syscall    GetDialogItem/GetDItem
  115. 0000011A  41ED 0032                lea.l      A0, [A5 + 0x32 /* export_2 */]
  116. 0000011E  2D48 FFF8                move.l     [A6 - 0x8], A0
  117. 00000122  2F03                     move.l     -[A7], D3
  118. 00000124  3F3C 0001                move.w     -[A7], 0x1
  119. 00000128  3F2E FFF6                move.w     -[A7], [A6 - 0xA]
  120. 0000012C  2F2E FFF8                move.l     -[A7], [A6 - 0x8]
  121. 00000130  486D FE1C                pea.l      [A5 - 0x1E4]
  122. 00000134  A98E                     syscall    SetDialogItem/SetDItem
  123. 00000136  2F03                     move.l     -[A7], D3
  124. 00000138  A915                     syscall    ShowWindow
  125. 0000013A  2F03                     move.l     -[A7], D3
  126. 0000013C  A873                     syscall    SetPort
  127. label0000013E:
  128. 0000013E  42A7                     clr.l      -[A7]
  129. 00000140  486E FFF4                pea.l      [A6 - 0xC]
  130. 00000144  A991                     syscall    ModalDialog
  131. 00000146  0C6E 0002 FFF4           cmpi.w     [A6 - 0xC], 0x2
  132. 0000014C  6600 FFF0                bne        -0xE /* 0000013E */
  133. 00000150  2F03                     move.l     -[A7], D3
  134. 00000152  3F3C 0002                move.w     -[A7], 0x2
  135. 00000156  486E FFF6                pea.l      [A6 - 0xA]
  136. 0000015A  486E FFF8                pea.l      [A6 - 0x8]
  137. 0000015E  486E FFEC                pea.l      [A6 - 0x14]
  138. 00000162  A98D                     syscall    GetDialogItem/GetDItem
  139. 00000164  486D FDC0                pea.l      [A5 - 0x240]
  140. 00000168  2F2E FFF8                move.l     -[A7], [A6 - 0x8]
  141. 0000016C  4EBA 0618                jsr        [PC + 0x618 /* 00000786 */]
  142. 00000170  486D FE1C                pea.l      [A5 - 0x1E4]
  143. 00000174  A8A3                     syscall    EraseRect
  144. 00000176  486D FE1C                pea.l      [A5 - 0x1E4]
  145. 0000017A  A928                     syscall    InvalRect
  146. 0000017C  508F                     addq.l     A7, 8
  147. label0000017E:
  148. 0000017E  42A7                     clr.l      -[A7]
  149. 00000180  486E FFF4                pea.l      [A6 - 0xC]
  150. 00000184  A991                     syscall    ModalDialog
  151. 00000186  0C6E 0002 FFF4           cmpi.w     [A6 - 0xC], 0x2
  152. 0000018C  6600 FFF0                bne        -0xE /* 0000017E */
  153. 00000190  2F03                     move.l     -[A7], D3
  154. 00000192  A983                     syscall    DisposeDialog
  155. 00000194  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  156. 00000198  A873                     syscall    SetPort
  157. label0000019A:
  158. 0000019A  6000 012A                bra        +0x12C /* 000002C6 */
  159. label0000019E:
  160. 0000019E  3001                     move.w     D0, D1
  161. 000001A0  0C40 0001                cmpi.w     D0, 0x1
  162. 000001A4  6D00 0128                blt        +0x12A /* 000002CE */
  163. 000001A8  6E02                     bgt        +0x4 /* 000001AC */
  164. 000001AA  600A                     bra        +0xC /* 000001B6 */
  165. label000001AC:
  166. 000001AC  5740                     subq.w     D0, 3
  167. 000001AE  6600 011E                bne        +0x120 /* 000002CE */
  168. 000001B2  6000 0118                bra        +0x11A /* 000002CC */
  169. label000001B6:
  170. 000001B6  4EBA 017E                jsr        [PC + 0x17E /* 00000336 */]
  171. 000001BA  486E FFFC                pea.l      [A6 - 0x4]
  172. 000001BE  A874                     syscall    GetPort
  173. 000001C0  598F                     subq.l     A7, 4
  174. 000001C2  3F3C 0080                move.w     -[A7], 0x80
  175. 000001C6  42A7                     clr.l      -[A7]
  176. 000001C8  2F3C FFFF FFFF           move.l     -[A7], 0xFFFFFFFF
  177. 000001CE  A97C                     syscall    GetNewDialog
  178. 000001D0  201F                     move.l     D0, [A7]+
  179. 000001D2  2600                     move.l     D3, D0
  180. 000001D4  2F03                     move.l     -[A7], D3
  181. 000001D6  3F3C 0001                move.w     -[A7], 0x1
  182. 000001DA  486E FFF6                pea.l      [A6 - 0xA]
  183. 000001DE  486E FFF8                pea.l      [A6 - 0x8]
  184. 000001E2  486D FE04                pea.l      [A5 - 0x1FC]
  185. 000001E6  A98D                     syscall    GetDialogItem/GetDItem
  186. 000001E8  41ED 003A                lea.l      A0, [A5 + 0x3A /* export_3 */]
  187. 000001EC  2D48 FFF8                move.l     [A6 - 0x8], A0
  188. 000001F0  2F03                     move.l     -[A7], D3
  189. 000001F2  3F3C 0001                move.w     -[A7], 0x1
  190. 000001F6  3F2E FFF6                move.w     -[A7], [A6 - 0xA]
  191. 000001FA  2F2E FFF8                move.l     -[A7], [A6 - 0x8]
  192. 000001FE  486D FE04                pea.l      [A5 - 0x1FC]
  193. 00000202  A98E                     syscall    SetDialogItem/SetDItem
  194. 00000204  2F03                     move.l     -[A7], D3
  195. 00000206  3F3C 0002                move.w     -[A7], 0x2
  196. 0000020A  486E FFF6                pea.l      [A6 - 0xA]
  197. 0000020E  486E FFF8                pea.l      [A6 - 0x8]
  198. 00000212  486D FE0C                pea.l      [A5 - 0x1F4]
  199. 00000216  A98D                     syscall    GetDialogItem/GetDItem
  200. 00000218  41ED 0042                lea.l      A0, [A5 + 0x42 /* export_4 */]
  201. 0000021C  2D48 FFF8                move.l     [A6 - 0x8], A0
  202. 00000220  2F03                     move.l     -[A7], D3
  203. 00000222  3F3C 0002                move.w     -[A7], 0x2
  204. 00000226  3F2E FFF6                move.w     -[A7], [A6 - 0xA]
  205. 0000022A  2F2E FFF8                move.l     -[A7], [A6 - 0x8]
  206. 0000022E  486D FE0C                pea.l      [A5 - 0x1F4]
  207. 00000232  A98E                     syscall    SetDialogItem/SetDItem
  208. 00000234  2F03                     move.l     -[A7], D3
  209. 00000236  3F3C 0005                move.w     -[A7], 0x5
  210. 0000023A  486E FFF6                pea.l      [A6 - 0xA]
  211. 0000023E  486E FFF8                pea.l      [A6 - 0x8]
  212. 00000242  486D FE14                pea.l      [A5 - 0x1EC]
  213. 00000246  A98D                     syscall    GetDialogItem/GetDItem
  214. 00000248  41ED 0042                lea.l      A0, [A5 + 0x42 /* export_4 */]
  215. 0000024C  2D48 FFF8                move.l     [A6 - 0x8], A0
  216. 00000250  2F03                     move.l     -[A7], D3
  217. 00000252  3F3C 0005                move.w     -[A7], 0x5
  218. 00000256  3F2E FFF6                move.w     -[A7], [A6 - 0xA]
  219. 0000025A  2F2E FFF8                move.l     -[A7], [A6 - 0x8]
  220. 0000025E  486D FE14                pea.l      [A5 - 0x1EC]
  221. 00000262  A98E                     syscall    SetDialogItem/SetDItem
  222. 00000264  2F03                     move.l     -[A7], D3
  223. 00000266  A873                     syscall    SetPort
  224. 00000268  2F03                     move.l     -[A7], D3
  225. 0000026A  A915                     syscall    ShowWindow
  226. label0000026C:
  227. 0000026C  42A7                     clr.l      -[A7]
  228. 0000026E  486E FFF4                pea.l      [A6 - 0xC]
  229. 00000272  A991                     syscall    ModalDialog
  230. 00000274  302E FFF4                move.w     D0, [A6 - 0xC]
  231. 00000278  0C40 0003                cmpi.w     D0, 0x3
  232. 0000027C  6D3E                     blt        +0x40 /* 000002BC */
  233. 0000027E  6E02                     bgt        +0x4 /* 00000282 */
  234. 00000280  6006                     bra        +0x8 /* 00000288 */
  235. label00000282:
  236. 00000282  5940                     subq.w     D0, 4
  237. 00000284  6636                     bne        +0x38 /* 000002BC */
  238. 00000286  602A                     bra        +0x2C /* 000002B2 */
  239. label00000288:
  240. 00000288  486D FE04                pea.l      [A5 - 0x1FC]
  241. 0000028C  A8A3                     syscall    EraseRect
  242. 0000028E  4EBA 00A6                jsr        [PC + 0xA6 /* 00000336 */]
  243. 00000292  2F03                     move.l     -[A7], D3
  244. 00000294  3F3C 0001                move.w     -[A7], 0x1
  245. 00000298  4EBA 01DA                jsr        [PC + 0x1DA /* 00000474 */]
  246. 0000029C  2F03                     move.l     -[A7], D3
  247. 0000029E  3F3C 0002                move.w     -[A7], 0x2
  248. 000002A2  4EBA 0294                jsr        [PC + 0x294 /* 00000538 */]
  249. 000002A6  2F03                     move.l     -[A7], D3
  250. 000002A8  3F3C 0005                move.w     -[A7], 0x5
  251. 000002AC  4EBA 028A                jsr        [PC + 0x28A /* 00000538 */]
  252. 000002B0  600A                     bra        +0xC /* 000002BC */
  253. label000002B2:
  254. 000002B2  2F03                     move.l     -[A7], D3
  255. 000002B4  A983                     syscall    DisposeDialog
  256. 000002B6  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  257. 000002BA  A873                     syscall    SetPort
  258. label000002BC:
  259. 000002BC  0C6E 0004 FFF4           cmpi.w     [A6 - 0xC], 0x4
  260. 000002C2  6600 FFA8                bne        -0x56 /* 0000026C */
  261. label000002C6:
  262. 000002C6  4267                     clr.w      -[A7]
  263. 000002C8  A938                     syscall    HiliteMenu
  264. 000002CA  6002                     bra        +0x4 /* 000002CE */
  265. label000002CC:
  266. 000002CC  A9F4                     syscall    ExitToShell
  267. label000002CE:
  268. 000002CE  4CEE 001C FFE0           movem.l    D2,D3,D4, [A6 - 0x20]
  269. 000002D4  4E5E                     unlink     A6
  270. 000002D6  4E75                     rts
  271. export_2:
  272. 000002D8  2F03                     move.l     -[A7], D3
  273. 000002DA  202F 000A                move.l     D0, [A7 + 0xA]
  274. 000002DE  302F 0008                move.w     D0, [A7 + 0x8]
  275. 000002E2  302D FE02                move.w     D0, [A5 - 0x1FE]
  276. 000002E6  6D3A                     blt        +0x3C /* 00000322 */
  277. 000002E8  6E02                     bgt        +0x4 /* 000002EC */
  278. 000002EA  6006                     bra        +0x8 /* 000002F2 */
  279. label000002EC:
  280. 000002EC  5340                     subq.w     D0, 1
  281. 000002EE  6632                     bne        +0x34 /* 00000322 */
  282. 000002F0  601A                     bra        +0x1C /* 0000030C */
  283. label000002F2:
  284. 000002F2  598F                     subq.l     A7, 4
  285. 000002F4  2F3C 5049 4354           move.l     -[A7], 0x50494354 /* 'PICT' */
  286. 000002FA  3F3C 00C8                move.w     -[A7], 0xC8
  287. 000002FE  A9A0                     syscall    GetResource
  288. 00000300  201F                     move.l     D0, [A7]+
  289. 00000302  2600                     move.l     D3, D0
  290. 00000304  3B7C 0001 FE02           move.w     [A5 - 0x1FE], 0x1
  291. 0000030A  6016                     bra        +0x18 /* 00000322 */
  292. label0000030C:
  293. 0000030C  598F                     subq.l     A7, 4
  294. 0000030E  2F3C 5049 4354           move.l     -[A7], 0x50494354 /* 'PICT' */
  295. 00000314  3F3C 00C9                move.w     -[A7], 0xC9
  296. 00000318  A9A0                     syscall    GetResource
  297. 0000031A  201F                     move.l     D0, [A7]+
  298. 0000031C  2600                     move.l     D3, D0
  299. 0000031E  426D FE02                clr.w      [A5 - 0x1FE]
  300. label00000322:
  301. 00000322  2F03                     move.l     -[A7], D3
  302. 00000324  486D FE1C                pea.l      [A5 - 0x1E4]
  303. 00000328  A8F6                     syscall    DrawPicture
  304. 0000032A  2F03                     move.l     -[A7], D3
  305. 0000032C  A9A3                     syscall    ReleaseResource
  306. 0000032E  261F                     move.l     D3, [A7]+
  307. 00000330  205F                     movea.l    A0, [A7]+
  308. 00000332  5C8F                     addq.l     A7, 6
  309. 00000334  4ED0                     jmp        [A0]
  310. fn00000336:
  311. 00000336  4E56 FFE8                link       A6, -0x0018
  312. 0000033A  48E7 3E20                movem.l    -[A7], D2,D3,D4,D5,D6,A2
  313. 0000033E  426D FE00                clr.w      [A5 - 0x200]
  314. 00000342  4EBA 0434                jsr        [PC + 0x434 /* 00000778 */]
  315. 00000346  7601                     moveq.l    D3, 0x01
  316. label00000348:
  317. 00000348  7831                     moveq.l    D4, 0x31
  318. 0000034A  7C00                     moveq.l    D6, 0x00
  319. 0000034C  7A01                     moveq.l    D5, 0x01
  320. label0000034E:
  321. 0000034E  2D7C 4000 8000 FFF6      move.l     [A6 - 0xA], 0x40008000
  322. 00000356  2D7C 0000 0000 FFFA      move.l     [A6 - 0x6], 0x0
  323. 0000035E  3D7C 0000 FFFE           move.w     [A6 - 0x2], 0x0
  324. 00000364  558F                     subq.l     A7, 2
  325. 00000366  A861                     syscall    Random
  326. 00000368  301F                     move.w     D0, [A7]+
  327. 0000036A  3F00                     move.w     -[A7], D0
  328. 0000036C  4267                     clr.w      -[A7]
  329. 0000036E  2F0F                     move.l     -[A7], A7
  330. 00000370  486E FFEA                pea.l      [A6 - 0x16]
  331. 00000374  3F3C 280E                move.w     -[A7], 0x280E
  332. 00000378  A9EB                     syscall    Pack4/FP68K
  333. 0000037A  588F                     addq.l     A7, 4
  334. 0000037C  486D FDC4                pea.l      [A5 - 0x23C]
  335. 00000380  486E FFEA                pea.l      [A6 - 0x16]
  336. 00000384  3F3C 0006                move.w     -[A7], 0x6
  337. 00000388  A9EB                     syscall    Pack4/FP68K
  338. 0000038A  486E FFEA                pea.l      [A6 - 0x16]
  339. 0000038E  486E FFF6                pea.l      [A6 - 0xA]
  340. 00000392  3F3C 0004                move.w     -[A7], 0x4
  341. 00000396  A9EB                     syscall    Pack4/FP68K
  342. 00000398  486D FDCE                pea.l      [A5 - 0x232]
  343. 0000039C  486E FFF6                pea.l      [A6 - 0xA]
  344. 000003A0  3F3C 0000                move.w     -[A7], 0x0
  345. 000003A4  A9EB                     syscall    Pack4/FP68K
  346. 000003A6  7204                     moveq.l    D1, 0x04
  347. 000003A8  2004                     move.l     D0, D4
  348. 000003AA  4EBA 07C6                jsr        [PC + 0x7C6 /* 00000B72 */]
  349. 000003AE  2F00                     move.l     -[A7], D0
  350. 000003B0  2F0F                     move.l     -[A7], A7
  351. 000003B2  486E FFEA                pea.l      [A6 - 0x16]
  352. 000003B6  3F3C 280E                move.w     -[A7], 0x280E
  353. 000003BA  A9EB                     syscall    Pack4/FP68K
  354. 000003BC  588F                     addq.l     A7, 4
  355. 000003BE  486E FFF6                pea.l      [A6 - 0xA]
  356. 000003C2  486E FFEA                pea.l      [A6 - 0x16]
  357. 000003C6  3F3C 0004                move.w     -[A7], 0x4
  358. 000003CA  A9EB                     syscall    Pack4/FP68K
  359. 000003CC  486E FFEA                pea.l      [A6 - 0x16]
  360. 000003D0  486E FFEA                pea.l      [A6 - 0x16]
  361. 000003D4  3F3C 0016                move.w     -[A7], 0x16
  362. 000003D8  A9EB                     syscall    Pack4/FP68K
  363. 000003DA  486E FFEA                pea.l      [A6 - 0x16]
  364. 000003DE  4EBA 04B6                jsr        [PC + 0x4B6 /* 00000896 */]
  365. 000003E2  2444                     movea.l    A2, D4
  366. 000003E4  95C0                     sub.l      A2, D0
  367. 000003E6  538A                     subq.l     A2, 1
  368. 000003E8  7401                     moveq.l    D2, 0x01
  369. 000003EA  7204                     moveq.l    D1, 0x04
  370. 000003EC  4EBA 075E                jsr        [PC + 0x75E /* 00000B4C */]
  371. 000003F0  2000                     move.l     D0, D0
  372. 000003F2  508F                     addq.l     A7, 8
  373. 000003F4  6602                     bne        +0x4 /* 000003F8 */
  374. 000003F6  7004                     moveq.l    D0, 0x04
  375. label000003F8:
  376. 000003F8  D480                     add.l      D2, D0
  377. 000003FA  7204                     moveq.l    D1, 0x04
  378. 000003FC  200A                     move.l     D0, A2
  379. 000003FE  4EBA 074C                jsr        [PC + 0x74C /* 00000B4C */]
  380. 00000402  2000                     move.l     D0, D0
  381. 00000404  6602                     bne        +0x4 /* 00000408 */
  382. 00000406  7004                     moveq.l    D0, 0x04
  383. label00000408:
  384. 00000408  D480                     add.l      D2, D0
  385. 0000040A  9882                     sub.l      D4, D2
  386. 0000040C  7001                     moveq.l    D0, 0x01
  387. 0000040E  B085                     cmp.l      D0, D5
  388. 00000410  6602                     bne        +0x4 /* 00000414 */
  389. 00000412  5382                     subq.l     D2, 1
  390. label00000414:
  391. 00000414  2002                     move.l     D0, D2
  392. 00000416  7204                     moveq.l    D1, 0x04
  393. 00000418  B280                     cmp.l      D1, D0
  394. 0000041A  6E12                     bgt        +0x14 /* 0000042E */
  395. 0000041C  6D02                     blt        +0x4 /* 00000420 */
  396. 0000041E  6008                     bra        +0xA /* 00000428 */
  397. label00000420:
  398. 00000420  7208                     moveq.l    D1, 0x08
  399. 00000422  B280                     cmp.l      D1, D0
  400. 00000424  6608                     bne        +0xA /* 0000042E */
  401. 00000426  6004                     bra        +0x6 /* 0000042C */
  402. label00000428:
  403. 00000428  5686                     addq.l     D6, 3
  404. 0000042A  6002                     bra        +0x4 /* 0000042E */
  405. label0000042C:
  406. 0000042C  5486                     addq.l     D6, 2
  407. label0000042E:
  408. 0000042E  5285                     addq.l     D5, 1
  409. 00000430  7003                     moveq.l    D0, 0x03
  410. 00000432  B085                     cmp.l      D0, D5
  411. 00000434  6C00 FF18                bge        -0xE6 /* 0000034E */
  412. 00000438  2003                     move.l     D0, D3
  413. 0000043A  5380                     subq.l     D0, 1
  414. 0000043C  D040                     add.w      D0, D0
  415. 0000043E  41ED FDF4                lea.l      A0, [A5 - 0x20C]
  416. 00000442  3186 0000                move.w     [A0 + D0.w], D6
  417. 00000446  7007                     moveq.l    D0, 0x07
  418. 00000448  B086                     cmp.l      D0, D6
  419. 0000044A  6700 0008                beq        +0xA /* 00000454 */
  420. 0000044E  7009                     moveq.l    D0, 0x09
  421. 00000450  B086                     cmp.l      D0, D6
  422. 00000452  660C                     bne        +0xE /* 00000460 */
  423. label00000454:
  424. 00000454  7201                     moveq.l    D1, 0x01
  425. 00000456  1003                     move.b     D0, D3
  426. 00000458  5300                     subq.b     D0, 1
  427. 0000045A  E1A1                     asl        D1, D0
  428. 0000045C  836D FE00                or.w       [A5 - 0x200], D1
  429. label00000460:
  430. 00000460  5283                     addq.l     D3, 1
  431. 00000462  7006                     moveq.l    D0, 0x06
  432. 00000464  B083                     cmp.l      D0, D3
  433. 00000466  6C00 FEE0                bge        -0x11E /* 00000348 */
  434. 0000046A  4CEE 047C FFD0           movem.l    D2,D3,D4,D5,D6,A2, [A6 - 0x30]
  435. 00000470  4E5E                     unlink     A6
  436. 00000472  4E75                     rts
  437. export_3:
  438. fn00000474:
  439. 00000474  4E56 FFE4                link       A6, -0x001C
  440. 00000478  48E7 1C00                movem.l    -[A7], D3,D4,D5
  441. 0000047C  202E 000A                move.l     D0, [A6 + 0xA]
  442. 00000480  302E 0008                move.w     D0, [A6 + 0x8]
  443. 00000484  486E FFE6                pea.l      [A6 - 0x1A]
  444. 00000488  A898                     syscall    GetPenState
  445. 0000048A  486D FF5E                pea.l      [A5 - 0xA2]
  446. 0000048E  A89D                     syscall    PenPat
  447. 00000490  4245                     clr.w      D5
  448. label00000492:
  449. 00000492  7006                     moveq.l    D0, 0x06
  450. 00000494  3205                     move.w     D1, D5
  451. 00000496  48C1                     ext.l      D1
  452. 00000498  9081                     sub.l      D0, D1
  453. 0000049A  E980                     asl        D0, 4
  454. 0000049C  3800                     move.w     D4, D0
  455. 0000049E  D86D FE04                add.w      D4, [A5 - 0x1FC]
  456. 000004A2  362D FE06                move.w     D3, [A5 - 0x1FA]
  457. 000004A6  5A43                     addq.w     D3, 5
  458. 000004A8  3F03                     move.w     -[A7], D3
  459. 000004AA  3F04                     move.w     -[A7], D4
  460. 000004AC  A893                     syscall    MoveTo
  461. 000004AE  3005                     move.w     D0, D5
  462. 000004B0  D040                     add.w      D0, D0
  463. 000004B2  41ED FDF4                lea.l      A0, [A5 - 0x20C]
  464. 000004B6  3030 0000                move.w     D0, [A0 + D0.w]
  465. 000004BA  0C40 0006                cmpi.w     D0, 0x6
  466. 000004BE  6D5A                     blt        +0x5C /* 0000051A */
  467. 000004C0  0C40 0009                cmpi.w     D0, 0x9 /* '\t' */
  468. 000004C4  6E54                     bgt        +0x56 /* 0000051A */
  469. 000004C6  D040                     add.w      D0, D0
  470. 000004C8  303B 00FA                move.w     D0, [PC + D0.w - 0x6]
  471. 000004CC  4EFB 0002                jmp        [PC + D0.w + 0x2]
  472. 000004D0  0016 0008                ori.b      [A6], 0x8
  473. 000004D4  0016 0008                ori.b      [A6], 0x8
  474. 000004D8  3F3C 0001                move.w     -[A7], 0x1
  475. 000004DC  3F3C 0005                move.w     -[A7], 0x5
  476. 000004E0  A89B                     syscall    PenSize
  477. 000004E2  3F03                     move.w     -[A7], D3
  478. 000004E4  6024                     bra        +0x26 /* 0000050A */
  479. 000004E6  3F3C 0001                move.w     -[A7], 0x1
  480. 000004EA  3F3C 0005                move.w     -[A7], 0x5
  481. 000004EE  A89B                     syscall    PenSize
  482. 000004F0  3F03                     move.w     -[A7], D3
  483. 000004F2  3F04                     move.w     -[A7], D4
  484. 000004F4  A893                     syscall    MoveTo
  485. 000004F6  3003                     move.w     D0, D3
  486. 000004F8  0640 0019                addi.w     D0, 0x19
  487. 000004FC  3F00                     move.w     -[A7], D0
  488. 000004FE  3F04                     move.w     -[A7], D4
  489. 00000500  A891                     syscall    LineTo
  490. 00000502  3003                     move.w     D0, D3
  491. 00000504  0640 002D                addi.w     D0, 0x2D /* '-' */
  492. 00000508  3F00                     move.w     -[A7], D0
  493. label0000050A:
  494. 0000050A  3F04                     move.w     -[A7], D4
  495. 0000050C  A893                     syscall    MoveTo
  496. 0000050E  3003                     move.w     D0, D3
  497. 00000510  0640 0046                addi.w     D0, 0x46 /* 'F' */
  498. 00000514  3F00                     move.w     -[A7], D0
  499. 00000516  3F04                     move.w     -[A7], D4
  500. 00000518  A891                     syscall    LineTo
  501. label0000051A:
  502. 0000051A  5245                     addq.w     D5, 1
  503. 0000051C  0C45 0006                cmpi.w     D5, 0x6
  504. 00000520  6D00 FF70                blt        -0x8E /* 00000492 */
  505. 00000524  486E FFE6                pea.l      [A6 - 0x1A]
  506. 00000528  A899                     syscall    SetPenState
  507. 0000052A  4CEE 0038 FFD8           movem.l    D3,D4,D5, [A6 - 0x28]
  508. 00000530  4E5E                     unlink     A6
  509. 00000532  205F                     movea.l    A0, [A7]+
  510. 00000534  5C8F                     addq.l     A7, 6
  511. 00000536  4ED0                     jmp        [A0]
  512. export_4:
  513. fn00000538:
  514. 00000538  4E56 FFEC                link       A6, -0x0014
  515. 0000053C  48E7 1C30                movem.l    -[A7], D3,D4,D5,A2,A3
  516. 00000540  202E 000A                move.l     D0, [A6 + 0xA]
  517. 00000544  302E 0008                move.w     D0, [A6 + 0x8]
  518. 00000548  0C40 0002                cmpi.w     D0, 0x2
  519. 0000054C  6D00 021C                blt        +0x21E /* 0000076A */
  520. 00000550  6E02                     bgt        +0x4 /* 00000554 */
  521. 00000552  6008                     bra        +0xA /* 0000055C */
  522. label00000554:
  523. 00000554  5B40                     subq.w     D0, 5
  524. 00000556  6600 0212                bne        +0x214 /* 0000076A */
  525. 0000055A  604C                     bra        +0x4E /* 000005A8 */
  526. label0000055C:
  527. 0000055C  302D FE00                move.w     D0, [A5 - 0x200]
  528. 00000560  D040                     add.w      D0, D0
  529. 00000562  41ED FE24                lea.l      A0, [A5 - 0x1DC]
  530. 00000566  3630 0000                move.w     D3, [A0 + D0.w]
  531. 0000056A  598F                     subq.l     A7, 4
  532. 0000056C  2F3C 4E41 4D45           move.l     -[A7], 0x4E414D45 /* 'NAME' */
  533. 00000572  3F03                     move.w     -[A7], D3
  534. 00000574  A9A0                     syscall    GetResource
  535. 00000576  201F                     move.l     D0, [A7]+
  536. 00000578  2440                     movea.l    A2, D0
  537. 0000057A  2F0A                     move.l     -[A7], A2
  538. 0000057C  4EBA 023A                jsr        [PC + 0x23A /* 000007B8 */]
  539. 00000580  2252                     movea.l    A1, [A2]
  540. 00000582  2049                     movea.l    A0, A1
  541. 00000584  5288                     addq.l     A0, 1
  542. 00000586  2F08                     move.l     -[A7], A0
  543. 00000588  7000                     moveq.l    D0, 0x00
  544. 0000058A  1011                     move.b     D0, [A1]
  545. 0000058C  2F00                     move.l     -[A7], D0
  546. 0000058E  486D FE0C                pea.l      [A5 - 0x1F4]
  547. 00000592  3F3C 0001                move.w     -[A7], 0x1
  548. 00000596  A9CE                     syscall    TETextBox/TextBox
  549. 00000598  2F0A                     move.l     -[A7], A2
  550. 0000059A  4EBA 0226                jsr        [PC + 0x226 /* 000007C2 */]
  551. 0000059E  2F0A                     move.l     -[A7], A2
  552. 000005A0  A9A3                     syscall    ReleaseResource
  553. 000005A2  508F                     addq.l     A7, 8
  554. 000005A4  6000 01C4                bra        +0x1C6 /* 0000076A */
  555. label000005A8:
  556. 000005A8  4878 0008                push.l     0x8
  557. 000005AC  486E FFF4                pea.l      [A6 - 0xC]
  558. 000005B0  486D FE14                pea.l      [A5 - 0x1EC]
  559. 000005B4  4EBA 0216                jsr        [PC + 0x216 /* 000007CC */]
  560. 000005B8  486E FFF4                pea.l      [A6 - 0xC]
  561. 000005BC  3F3C 0002                move.w     -[A7], 0x2
  562. 000005C0  3F3C 0002                move.w     -[A7], 0x2
  563. 000005C4  A8A9                     syscall    InsetRect
  564. 000005C6  486E FFF4                pea.l      [A6 - 0xC]
  565. 000005CA  A8A1                     syscall    FrameRect
  566. 000005CC  486E FFF4                pea.l      [A6 - 0xC]
  567. 000005D0  3F3C 0002                move.w     -[A7], 0x2
  568. 000005D4  3F3C 0002                move.w     -[A7], 0x2
  569. 000005D8  A8A9                     syscall    InsetRect
  570. 000005DA  598F                     subq.l     A7, 4
  571. 000005DC  486E FFF4                pea.l      [A6 - 0xC]
  572. 000005E0  A8F3                     syscall    OpenPicture
  573. 000005E2  201F                     move.l     D0, [A7]+
  574. 000005E4  2800                     move.l     D4, D0
  575. 000005E6  3F3C 0004                move.w     -[A7], 0x4
  576. 000005EA  A887                     syscall    TextFont
  577. 000005EC  3F3C 0001                move.w     -[A7], 0x1
  578. 000005F0  A888                     syscall    TextFace
  579. 000005F2  3F3C 0009                move.w     -[A7], 0x9 /* '\t' */
  580. 000005F6  A88A                     syscall    TextSize
  581. 000005F8  486D FDD8                pea.l      [A5 - 0x228]
  582. 000005FC  4878 000A                push.l     0xA /* '\n' */
  583. 00000600  486E FFF4                pea.l      [A6 - 0xC]
  584. 00000604  4267                     clr.w      -[A7]
  585. 00000606  A9CE                     syscall    TETextBox/TextBox
  586. 00000608  486E FFEC                pea.l      [A6 - 0x14]
  587. 0000060C  A88B                     syscall    GetFontInfo
  588. 0000060E  302D FE00                move.w     D0, [A5 - 0x200]
  589. 00000612  D040                     add.w      D0, D0
  590. 00000614  41ED FE24                lea.l      A0, [A5 - 0x1DC]
  591. 00000618  3630 0000                move.w     D3, [A0 + D0.w]
  592. 0000061C  598F                     subq.l     A7, 4
  593. 0000061E  2F3C 494D 4147           move.l     -[A7], 0x494D4147 /* 'IMAG' */
  594. 00000624  3F03                     move.w     -[A7], D3
  595. 00000626  A9A0                     syscall    GetResource
  596. 00000628  201F                     move.l     D0, [A7]+
  597. 0000062A  2440                     movea.l    A2, D0
  598. 0000062C  2F0A                     move.l     -[A7], A2
  599. 0000062E  4EBA 0188                jsr        [PC + 0x188 /* 000007B8 */]
  600. 00000632  2652                     movea.l    A3, [A2]
  601. 00000634  486E FFFC                pea.l      [A6 - 0x4]
  602. 00000638  A89A                     syscall    GetPen
  603. 0000063A  302E FFF2                move.w     D0, [A6 - 0xE]
  604. 0000063E  D06E FFEE                add.w      D0, [A6 - 0x12]
  605. 00000642  D16E FFFC                add.w      [A6 - 0x4], D0
  606. 00000646  486E FFF4                pea.l      [A6 - 0xC]
  607. 0000064A  3F2E FFF6                move.w     -[A7], [A6 - 0xA]
  608. 0000064E  3F2E FFFC                move.w     -[A7], [A6 - 0x4]
  609. 00000652  3F2E FFFA                move.w     -[A7], [A6 - 0x6]
  610. 00000656  3F2E FFF8                move.w     -[A7], [A6 - 0x8]
  611. 0000065A  A8A7                     syscall    SetRect
  612. 0000065C  4267                     clr.w      -[A7]
  613. 0000065E  A888                     syscall    TextFace
  614. 00000660  204B                     movea.l    A0, A3
  615. 00000662  5288                     addq.l     A0, 1
  616. 00000664  2F08                     move.l     -[A7], A0
  617. 00000666  7000                     moveq.l    D0, 0x00
  618. 00000668  1013                     move.b     D0, [A3]
  619. 0000066A  2F00                     move.l     -[A7], D0
  620. 0000066C  486E FFF4                pea.l      [A6 - 0xC]
  621. 00000670  4267                     clr.w      -[A7]
  622. 00000672  A9CE                     syscall    TETextBox/TextBox
  623. 00000674  2F0A                     move.l     -[A7], A2
  624. 00000676  4EBA 014A                jsr        [PC + 0x14A /* 000007C2 */]
  625. 0000067A  2F0A                     move.l     -[A7], A2
  626. 0000067C  A9A3                     syscall    ReleaseResource
  627. 0000067E  3F3C 0001                move.w     -[A7], 0x1
  628. 00000682  A888                     syscall    TextFace
  629. 00000684  486E FFFC                pea.l      [A6 - 0x4]
  630. 00000688  A89A                     syscall    GetPen
  631. 0000068A  302E FFF2                move.w     D0, [A6 - 0xE]
  632. 0000068E  48C0                     ext.l      D0
  633. 00000690  322E FFEE                move.w     D1, [A6 - 0x12]
  634. 00000694  48C1                     ext.l      D1
  635. 00000696  D081                     add.l      D0, D1
  636. 00000698  D080                     add.l      D0, D0
  637. 0000069A  D16E FFFC                add.w      [A6 - 0x4], D0
  638. 0000069E  486E FFF4                pea.l      [A6 - 0xC]
  639. 000006A2  3F2E FFF6                move.w     -[A7], [A6 - 0xA]
  640. 000006A6  3F2E FFFC                move.w     -[A7], [A6 - 0x4]
  641. 000006AA  3F2E FFFA                move.w     -[A7], [A6 - 0x6]
  642. 000006AE  3F2E FFF8                move.w     -[A7], [A6 - 0x8]
  643. 000006B2  A8A7                     syscall    SetRect
  644. 000006B4  486D FDE4                pea.l      [A5 - 0x21C]
  645. 000006B8  4878 000E                push.l     0xE
  646. 000006BC  486E FFF4                pea.l      [A6 - 0xC]
  647. 000006C0  4267                     clr.w      -[A7]
  648. 000006C2  A9CE                     syscall    TETextBox/TextBox
  649. 000006C4  598F                     subq.l     A7, 4
  650. 000006C6  2F3C 4A55 4447           move.l     -[A7], 0x4A554447 /* 'JUDG' */
  651. 000006CC  3F03                     move.w     -[A7], D3
  652. 000006CE  A9A0                     syscall    GetResource
  653. 000006D0  201F                     move.l     D0, [A7]+
  654. 000006D2  2440                     movea.l    A2, D0
  655. 000006D4  2A0A                     move.l     D5, A2
  656. 000006D6  4FEF 0014                lea.l      A7, [A7 + 0x14]
  657. 000006DA  6754                     beq        +0x56 /* 00000730 */
  658. 000006DC  2F0A                     move.l     -[A7], A2
  659. 000006DE  4EBA 00D8                jsr        [PC + 0xD8 /* 000007B8 */]
  660. 000006E2  2612                     move.l     D3, [A2]
  661. 000006E4  486E FFFC                pea.l      [A6 - 0x4]
  662. 000006E8  A89A                     syscall    GetPen
  663. 000006EA  302E FFF2                move.w     D0, [A6 - 0xE]
  664. 000006EE  D06E FFEE                add.w      D0, [A6 - 0x12]
  665. 000006F2  D16E FFFC                add.w      [A6 - 0x4], D0
  666. 000006F6  486E FFF4                pea.l      [A6 - 0xC]
  667. 000006FA  3F2E FFF6                move.w     -[A7], [A6 - 0xA]
  668. 000006FE  3F2E FFFC                move.w     -[A7], [A6 - 0x4]
  669. 00000702  3F2E FFFA                move.w     -[A7], [A6 - 0x6]
  670. 00000706  3F2E FFF8                move.w     -[A7], [A6 - 0x8]
  671. 0000070A  A8A7                     syscall    SetRect
  672. 0000070C  4267                     clr.w      -[A7]
  673. 0000070E  A888                     syscall    TextFace
  674. 00000710  2F03                     move.l     -[A7], D3
  675. 00000712  2F03                     move.l     -[A7], D3
  676. 00000714  4EBA 0486                jsr        [PC + 0x486 /* 00000B9C */]
  677. 00000718  588F                     addq.l     A7, 4
  678. 0000071A  2F00                     move.l     -[A7], D0
  679. 0000071C  486E FFF4                pea.l      [A6 - 0xC]
  680. 00000720  4267                     clr.w      -[A7]
  681. 00000722  A9CE                     syscall    TETextBox/TextBox
  682. 00000724  2F0A                     move.l     -[A7], A2
  683. 00000726  4EBA 009A                jsr        [PC + 0x9A /* 000007C2 */]
  684. 0000072A  2F0A                     move.l     -[A7], A2
  685. 0000072C  A9A3                     syscall    ReleaseResource
  686. 0000072E  508F                     addq.l     A7, 8
  687. label00000730:
  688. 00000730  A8F4                     syscall    ClosePicture
  689. 00000732  4878 0008                push.l     0x8
  690. 00000736  486E FFF4                pea.l      [A6 - 0xC]
  691. 0000073A  486D FE14                pea.l      [A5 - 0x1EC]
  692. 0000073E  4EBA 008C                jsr        [PC + 0x8C /* 000007CC */]
  693. 00000742  486E FFF4                pea.l      [A6 - 0xC]
  694. 00000746  3F3C 0004                move.w     -[A7], 0x4
  695. 0000074A  3F3C 0004                move.w     -[A7], 0x4
  696. 0000074E  A8A9                     syscall    InsetRect
  697. 00000750  2F04                     move.l     -[A7], D4
  698. 00000752  486E FFF4                pea.l      [A6 - 0xC]
  699. 00000756  A8F6                     syscall    DrawPicture
  700. 00000758  4267                     clr.w      -[A7]
  701. 0000075A  A887                     syscall    TextFont
  702. 0000075C  4267                     clr.w      -[A7]
  703. 0000075E  A888                     syscall    TextFace
  704. 00000760  3F3C 000C                move.w     -[A7], 0xC
  705. 00000764  A88A                     syscall    TextSize
  706. 00000766  4FEF 000C                lea.l      A7, [A7 + 0xC]
  707. label0000076A:
  708. 0000076A  4CEE 0C38 FFD8           movem.l    D3,D4,D5,A2,A3, [A6 - 0x28]
  709. 00000770  4E5E                     unlink     A6
  710. 00000772  205F                     movea.l    A0, [A7]+
  711. 00000774  5C8F                     addq.l     A7, 6
  712. 00000776  4ED0                     jmp        [A0]
  713. fn00000778:
  714. 00000778  2055                     movea.l    A0, [A5]
  715. 0000077A  327C 0156                movea.w    A1, 0x156
  716. 0000077E  2011                     move.l     D0, [A1]
  717. 00000780  2140 FF82                move.l     [A0 - 0x7E], D0
  718. 00000784  4E75                     rts
  719. fn00000786:
  720. 00000786  2F02                     move.l     -[A7], D2
  721. 00000788  2F2F 0008                move.l     -[A7], [A7 + 0x8]
  722. 0000078C  2F2F 0010                move.l     -[A7], [A7 + 0x10]
  723. 00000790  4EBA 006E                jsr        [PC + 0x6E /* 00000800 */]
  724. 00000794  A95F                     syscall    SetControlTitle/SetCTitle
  725. 00000796  2F2F 000C                move.l     -[A7], [A7 + 0xC]
  726. 0000079A  4EBA 0096                jsr        [PC + 0x96 /* 00000832 */]
  727. 0000079E  584F                     addq.w     A7, 4
  728. 000007A0  241F                     move.l     D2, [A7]+
  729. 000007A2  4E75                     rts
  730. 000007A4  7000                     moveq.l    D0, 0x00
  731. label000007A6:
  732. 000007A6  31C0 0220                move.w     [0x00000220 /* MemErr */], D0
  733. 000007AA  2008                     move.l     D0, A0
  734. 000007AC  4E75                     rts
  735. fn000007AE:
  736. 000007AE  202F 0004                move.l     D0, [A7 + 0x4]
  737. 000007B2  A11E                     syscall    NewPtr, flags=1
  738. 000007B4  4EFA FFF0                jmp        [PC - 0x10 /* 000007A6 */]
  739. fn000007B8:
  740. 000007B8  206F 0004                movea.l    A0, [A7 + 0x4]
  741. 000007BC  A029                     syscall    HLock
  742. 000007BE  4EFA FFE6                jmp        [PC - 0x1A /* 000007A6 */]
  743. fn000007C2:
  744. 000007C2  206F 0004                movea.l    A0, [A7 + 0x4]
  745. 000007C6  A02A                     syscall    HUnlock
  746. 000007C8  4EFA FFDC                jmp        [PC - 0x24 /* 000007A6 */]
  747. fn000007CC:
  748. 000007CC  202F 000C                move.l     D0, [A7 + 0xC]
  749. 000007D0  226F 0008                movea.l    A1, [A7 + 0x8]
  750. 000007D4  206F 0004                movea.l    A0, [A7 + 0x4]
  751. 000007D8  A02E                     syscall    BlockMove/BlockMoveData
  752. 000007DA  4EFA FFCA                jmp        [PC - 0x36 /* 000007A6 */]
  753. fn000007DE:
  754. 000007DE  2F02                     move.l     -[A7], D2
  755. 000007E0  42A7                     clr.l      -[A7]
  756. 000007E2  206F 000C                movea.l    A0, [A7 + 0xC]
  757. 000007E6  2F10                     move.l     -[A7], [A0]
  758. 000007E8  A93D                     syscall    MenuSelect
  759. 000007EA  201F                     move.l     D0, [A7]+
  760. 000007EC  241F                     move.l     D2, [A7]+
  761. 000007EE  4E75                     rts
  762. fn000007F0:
  763. 000007F0  302F 0006                move.w     D0, [A7 + 0x6]
  764. 000007F4  4840                     swap.w     D0
  765. 000007F6  302F 000A                move.w     D0, [A7 + 0xA]
  766. 000007FA  4840                     swap.w     D0
  767. 000007FC  A032                     syscall    FlushEvents
  768. 000007FE  4E75                     rts
  769. fn00000800:
  770. 00000800  202F 0004                move.l     D0, [A7 + 0x4]
  771. 00000804  6726                     beq        +0x28 /* 0000082C */
  772. 00000806  2040                     movea.l    A0, D0
  773. 00000808  2248                     movea.l    A1, A0
  774. 0000080A  1019                     move.b     D0, [A1]+
  775. 0000080C  671E                     beq        +0x20 /* 0000082C */
  776. label0000080E:
  777. 0000080E  1211                     move.b     D1, [A1]
  778. 00000810  12C0                     move.b     [A1]+, D0
  779. 00000812  1001                     move.b     D0, D1
  780. 00000814  66F8                     bne        -0x6 /* 0000080E */
  781. 00000816  93C8                     sub.l      A1, A0
  782. 00000818  2009                     move.l     D0, A1
  783. 0000081A  5340                     subq.w     D0, 1
  784. 0000081C  0C80 0000 00FF           cmpi.l     D0, 0xFF
  785. 00000822  6F06                     ble        +0x8 /* 0000082A */
  786. 00000824  203C 0000 00FF           move.l     D0, 0xFF
  787. label0000082A:
  788. 0000082A  1080                     move.b     [A0], D0
  789. label0000082C:
  790. 0000082C  202F 0004                move.l     D0, [A7 + 0x4]
  791. 00000830  4E75                     rts
  792. fn00000832:
  793. 00000832  202F 0004                move.l     D0, [A7 + 0x4]
  794. 00000836  6712                     beq        +0x14 /* 0000084A */
  795. 00000838  2040                     movea.l    A0, D0
  796. 0000083A  7000                     moveq.l    D0, 0x00
  797. 0000083C  1010                     move.b     D0, [A0]
  798. 0000083E  6004                     bra        +0x6 /* 00000844 */
  799. label00000840:
  800. 00000840  10E8 0001                move.b     [A0]+, [A0 + 0x1]
  801. label00000844:
  802. 00000844  51C8 FFFA                dbf        D0, -0x8 /* 00000840 */
  803. 00000848  4210                     clr.b      [A0]
  804. label0000084A:
  805. 0000084A  202F 0004                move.l     D0, [A7 + 0x4]
  806. 0000084E  4E75                     rts
  807. fn00000850:
  808. 00000850  2F02                     move.l     -[A7], D2
  809. 00000852  4267                     clr.w      -[A7]
  810. 00000854  206F 000A                movea.l    A0, [A7 + 0xA]
  811. 00000858  2F10                     move.l     -[A7], [A0]
  812. 0000085A  2F2F 0012                move.l     -[A7], [A7 + 0x12]
  813. 0000085E  A92C                     syscall    FindWindow
  814. 00000860  301F                     move.w     D0, [A7]+
  815. 00000862  48C0                     ext.l      D0
  816. 00000864  241F                     move.l     D2, [A7]+
  817. 00000866  4E75                     rts
  818. export_0:
  819. 00000868  2057                     movea.l    A0, [A7]
  820. 0000086A  4FEF FFF4                lea.l      A7, [A7 - 0xC]
  821. 0000086E  42A7                     clr.l      -[A7]
  822. 00000870  486F 000C                pea.l      [A7 + 0xC]
  823. 00000874  486F 000C                pea.l      [A7 + 0xC]
  824. 00000878  486F 000C                pea.l      [A7 + 0xC]
  825. 0000087C  2F08                     move.l     -[A7], A0
  826. 0000087E  4EBA 0038                jsr        [PC + 0x38 /* 000008B8 */]
  827. 00000882  588F                     addq.l     A7, 4
  828. 00000884  4FEF 0010                lea.l      A7, [A7 + 0x10]
  829. 00000888  4EBA F77E                jsr        [PC - 0x882 /* 00000008 */]
  830. 0000088C  4FEF 000C                lea.l      A7, [A7 + 0xC]
  831. 00000890  2F00                     move.l     -[A7], D0
  832. 00000892  4EBA 0206                jsr        [PC + 0x206 /* 00000A9A */]
  833. fn00000896:
  834. 00000896  303C 2810                move.w     D0, 0x2810
  835. 0000089A  7200                     moveq.l    D1, 0x00
  836. label0000089C:
  837. 0000089C  42A7                     clr.l      -[A7]
  838. 0000089E  2F2F 0008                move.l     -[A7], [A7 + 0x8]
  839. 000008A2  486F 0004                pea.l      [A7 + 0x4]
  840. 000008A6  3F00                     move.w     -[A7], D0
  841. 000008A8  A9EB                     syscall    Pack4/FP68K
  842. 000008AA  201F                     move.l     D0, [A7]+
  843. 000008AC  E2B8                     ror        D0, D1
  844. 000008AE  4E75                     rts
  845. 000008B0  303C 2010                move.w     D0, 0x2010
  846. 000008B4  7210                     moveq.l    D1, 0x10
  847. 000008B6  60E4                     bra        -0x1A /* 0000089C */
  848. fn000008B8:
  849. 000008B8  4E56 0000                link       A6, 0
  850. 000008BC  48E7 3030                movem.l    -[A7], D2,D3,A2,A3
  851. 000008C0  262E 0008                move.l     D3, [A6 + 0x8]
  852. 000008C4  266E 000C                movea.l    A3, [A6 + 0xC]
  853. 000008C8  242E 0010                move.l     D2, [A6 + 0x10]
  854. 000008CC  4EAD 004A                jsr        [A5 + 0x4A /* export_5 */]
  855. 000008D0  206D FFDE                movea.l    A0, [A5 - 0x22]
  856. 000008D4  2083                     move.l     [A0], D3
  857. 000008D6  7001                     moveq.l    D0, 0x01
  858. 000008D8  4AB8 0316                tst.l      [0x00000316 /* HpChk/MacPgm */]
  859. 000008DC  6700 0036                beq        +0x38 /* 00000914 */
  860. 000008E0  0838 0000 0319           btst.b     [0x00000319], 0x0
  861. 000008E6  6600 002C                bne        +0x2E /* 00000914 */
  862. 000008EA  2078 0316                movea.l    A0, [0x00000316 /* HpChk/MacPgm */]
  863. 000008EE  0C90 4D50 474D           cmpi.l     [A0], 0x4D50474D /* 'MPGM' */
  864. 000008F4  6600 001E                bne        +0x20 /* 00000914 */
  865. 000008F8  2078 0316                movea.l    A0, [0x00000316 /* HpChk/MacPgm */]
  866. 000008FC  4AA8 0004                tst.l      [A0 + 0x4]
  867. 00000900  6700 0012                beq        +0x14 /* 00000914 */
  868. 00000904  2078 0316                movea.l    A0, [0x00000316 /* HpChk/MacPgm */]
  869. 00000908  2268 0004                movea.l    A1, [A0 + 0x4]
  870. 0000090C  4A51                     tst.w      [A1]
  871. 0000090E  6700 0004                beq        +0x6 /* 00000914 */
  872. 00000912  7000                     moveq.l    D0, 0x00
  873. label00000914:
  874. 00000914  2B40 FFFC                move.l     [A5 - 0x4], D0
  875. 00000918  4AAD FFFC                tst.l      [A5 - 0x4]
  876. 0000091C  6700 0058                beq        +0x5A /* 00000976 */
  877. 00000920  41F8 0910                lea.l      A0, [0x00000910 /* CurApName */]
  878. 00000924  43ED FFA6                lea.l      A1, [A5 - 0x5A]
  879. 00000928  7010                     moveq.l    D0, 0x10
  880. label0000092A:
  881. 0000092A  32D8                     move.w     [A1]+, [A0]+
  882. 0000092C  51C8 FFFC                dbf        D0, -0x6 /* 0000092A */
  883. 00000930  206D FFCE                movea.l    A0, [A5 - 0x32]
  884. 00000934  43ED FFA6                lea.l      A1, [A5 - 0x5A]
  885. 00000938  2089                     move.l     [A0], A1
  886. 0000093A  4AAE 0018                tst.l      [A6 + 0x18]
  887. 0000093E  660C                     bne        +0xE /* 0000094C */
  888. 00000940  206D FFCE                movea.l    A0, [A5 - 0x32]
  889. 00000944  2F10                     move.l     -[A7], [A0]
  890. 00000946  4EBA FEEA                jsr        [PC - 0x116 /* 00000832 */]
  891. 0000094A  588F                     addq.l     A7, 4
  892. label0000094C:
  893. 0000094C  200B                     move.l     D0, A3
  894. 0000094E  6704                     beq        +0x6 /* 00000954 */
  895. 00000950  7001                     moveq.l    D0, 0x01
  896. 00000952  2680                     move.l     [A3], D0
  897. label00000954:
  898. 00000954  4A82                     tst.l      D2
  899. 00000956  6706                     beq        +0x8 /* 0000095E */
  900. 00000958  2042                     movea.l    A0, D2
  901. 0000095A  20AD FFCE                move.l     [A0], [A5 - 0x32]
  902. label0000095E:
  903. 0000095E  4AAE 0014                tst.l      [A6 + 0x14]
  904. 00000962  6708                     beq        +0xA /* 0000096C */
  905. 00000964  206E 0014                movea.l    A0, [A6 + 0x14]
  906. 00000968  20AD FFD2                move.l     [A0], [A5 - 0x2E]
  907. label0000096C:
  908. 0000096C  7001                     moveq.l    D0, 0x01
  909. 0000096E  2B40 FFFC                move.l     [A5 - 0x4], D0
  910. 00000972  6000 0114                bra        +0x116 /* 00000A88 */
  911. label00000976:
  912. 00000976  2078 0316                movea.l    A0, [0x00000316 /* HpChk/MacPgm */]
  913. 0000097A  2268 0004                movea.l    A1, [A0 + 0x4]
  914. 0000097E  3011                     move.w     D0, [A1]
  915. 00000980  B06D FFC8                cmp.w      D0, [A5 - 0x38]
  916. 00000984  670C                     beq        +0xE /* 00000992 */
  917. 00000986  2F3C 8000 0000           move.l     -[A7], 0x80000000
  918. 0000098C  4EBA 012C                jsr        [PC + 0x12C /* 00000ABA */]
  919. 00000990  588F                     addq.l     A7, 4
  920. label00000992:
  921. 00000992  2078 0316                movea.l    A0, [0x00000316 /* HpChk/MacPgm */]
  922. 00000996  2268 0004                movea.l    A1, [A0 + 0x4]
  923. 0000099A  41ED FFC8                lea.l      A0, [A5 - 0x38]
  924. 0000099E  2348 0024                move.l     [A1 + 0x24], A0
  925. 000009A2  2078 0316                movea.l    A0, [0x00000316 /* HpChk/MacPgm */]
  926. 000009A6  2B68 0004 FFEC           move.l     [A5 - 0x14], [A0 + 0x4]
  927. 000009AC  2078 0316                movea.l    A0, [0x00000316 /* HpChk/MacPgm */]
  928. 000009B0  2268 0004                movea.l    A1, [A0 + 0x4]
  929. 000009B4  2B69 0002 FFCA           move.l     [A5 - 0x36], [A1 + 0x2]
  930. 000009BA  2078 0316                movea.l    A0, [0x00000316 /* HpChk/MacPgm */]
  931. 000009BE  2268 0004                movea.l    A1, [A0 + 0x4]
  932. 000009C2  2B69 0006 FFCE           move.l     [A5 - 0x32], [A1 + 0x6]
  933. 000009C8  2078 0316                movea.l    A0, [0x00000316 /* HpChk/MacPgm */]
  934. 000009CC  2268 0004                movea.l    A1, [A0 + 0x4]
  935. 000009D0  2B69 000A FFD2           move.l     [A5 - 0x2E], [A1 + 0xA]
  936. 000009D6  4AAE 0018                tst.l      [A6 + 0x18]
  937. 000009DA  672C                     beq        +0x2E /* 00000A08 */
  938. 000009DC  246D FFCE                movea.l    A2, [A5 - 0x32]
  939. 000009E0  600A                     bra        +0xC /* 000009EC */
  940. label000009E2:
  941. 000009E2  2F12                     move.l     -[A7], [A2]
  942. 000009E4  4EBA FE1A                jsr        [PC - 0x1E6 /* 00000800 */]
  943. 000009E8  588F                     addq.l     A7, 4
  944. 000009EA  588A                     addq.l     A2, 4
  945. label000009EC:
  946. 000009EC  4A92                     tst.l      [A2]
  947. 000009EE  6600 FFF2                bne        -0xC /* 000009E2 */
  948. 000009F2  246D FFD2                movea.l    A2, [A5 - 0x2E]
  949. 000009F6  600A                     bra        +0xC /* 00000A02 */
  950. label000009F8:
  951. 000009F8  2F12                     move.l     -[A7], [A2]
  952. 000009FA  4EBA FE04                jsr        [PC - 0x1FC /* 00000800 */]
  953. 000009FE  588F                     addq.l     A7, 4
  954. 00000A00  588A                     addq.l     A2, 4
  955. label00000A02:
  956. 00000A02  4A92                     tst.l      [A2]
  957. 00000A04  6600 FFF2                bne        -0xC /* 000009F8 */
  958. label00000A08:
  959. 00000A08  200B                     move.l     D0, A3
  960. 00000A0A  6704                     beq        +0x6 /* 00000A10 */
  961. 00000A0C  26AD FFCA                move.l     [A3], [A5 - 0x36]
  962. label00000A10:
  963. 00000A10  4A82                     tst.l      D2
  964. 00000A12  6706                     beq        +0x8 /* 00000A1A */
  965. 00000A14  2042                     movea.l    A0, D2
  966. 00000A16  20AD FFCE                move.l     [A0], [A5 - 0x32]
  967. label00000A1A:
  968. 00000A1A  4AAE 0014                tst.l      [A6 + 0x14]
  969. 00000A1E  6708                     beq        +0xA /* 00000A28 */
  970. 00000A20  206E 0014                movea.l    A0, [A6 + 0x14]
  971. 00000A24  20AD FFD2                move.l     [A0], [A5 - 0x2E]
  972. label00000A28:
  973. 00000A28  2078 0316                movea.l    A0, [0x00000316 /* HpChk/MacPgm */]
  974. 00000A2C  2268 0004                movea.l    A1, [A0 + 0x4]
  975. 00000A30  4AA9 0020                tst.l      [A1 + 0x20]
  976. 00000A34  674C                     beq        +0x4E /* 00000A82 */
  977. 00000A36  4878 0078                push.l     0x78 /* 'x' */
  978. 00000A3A  4EBA FD72                jsr        [PC - 0x28E /* 000007AE */]
  979. 00000A3E  2B40 FFE8                move.l     [A5 - 0x18], D0
  980. 00000A42  2078 0316                movea.l    A0, [0x00000316 /* HpChk/MacPgm */]
  981. 00000A46  2268 0004                movea.l    A1, [A0 + 0x4]
  982. 00000A4A  2429 0020                move.l     D2, [A1 + 0x20]
  983. 00000A4E  7200                     moveq.l    D1, 0x00
  984. 00000A50  588F                     addq.l     A7, 4
  985. label00000A52:
  986. 00000A52  2001                     move.l     D0, D1
  987. 00000A54  E780                     asl        D0, 3
  988. 00000A56  2600                     move.l     D3, D0
  989. 00000A58  D080                     add.l      D0, D0
  990. 00000A5A  D083                     add.l      D0, D3
  991. 00000A5C  2240                     movea.l    A1, D0
  992. 00000A5E  D3ED FFE8                add.l      A1, [A5 - 0x18]
  993. 00000A62  2601                     move.l     D3, D1
  994. 00000A64  E783                     asl        D3, 3
  995. 00000A66  2003                     move.l     D0, D3
  996. 00000A68  D683                     add.l      D3, D3
  997. 00000A6A  D680                     add.l      D3, D0
  998. 00000A6C  2043                     movea.l    A0, D3
  999. 00000A6E  D1C2                     add.l      A0, D2
  1000. 00000A70  7005                     moveq.l    D0, 0x05
  1001. label00000A72:
  1002. 00000A72  22D8                     move.l     [A1]+, [A0]+
  1003. 00000A74  51C8 FFFC                dbf        D0, -0x6 /* 00000A72 */
  1004. 00000A78  5281                     addq.l     D1, 1
  1005. 00000A7A  7005                     moveq.l    D0, 0x05
  1006. 00000A7C  B081                     cmp.l      D0, D1
  1007. 00000A7E  6E00 FFD2                bgt        -0x2C /* 00000A52 */
  1008. label00000A82:
  1009. 00000A82  7000                     moveq.l    D0, 0x00
  1010. 00000A84  2B40 FFFC                move.l     [A5 - 0x4], D0
  1011. label00000A88:
  1012. 00000A88  4CEE 0C0C FFF0           movem.l    D2,D3,A2,A3, [A6 - 0x10]
  1013. 00000A8E  4E5E                     unlink     A6
  1014. 00000A90  4E75                     rts
  1015. 00000A92  DF52                     add.w      [A2], D7
  1016. 00000A94  5449                     addq.w     A1, 2
  1017. 00000A96  4E49                     trap       9
  1018. 00000A98  5420                     addq.b     -[A0], 2
  1019. fn00000A9A:
  1020. 00000A9A  4E56 0000                link       A6, 0
  1021. 00000A9E  202E 0008                move.l     D0, [A6 + 0x8]
  1022. 00000AA2  0280 00FF FFFF           andi.l     D0, 0xFFFFFF
  1023. 00000AA8  2F00                     move.l     -[A7], D0
  1024. 00000AAA  4EBA 000E                jsr        [PC + 0xE /* 00000ABA */]
  1025. 00000AAE  4E5E                     unlink     A6
  1026. 00000AB0  4E75                     rts
  1027. 00000AB2  C558                     and.w      [A0]+, D2
  1028. 00000AB4  4954                     chk.w      D4, [A4]
  1029. 00000AB6  2020                     move.l     D0, -[A0]
  1030. 00000AB8  2020                     move.l     D0, -[A0]
  1031. fn00000ABA:
  1032. 00000ABA  4E56 0000                link       A6, 0
  1033. 00000ABE  48E7 2020                movem.l    -[A7], D2,A2
  1034. 00000AC2  242E 0008                move.l     D2, [A6 + 0x8]
  1035. 00000AC6  206D FFDE                movea.l    A0, [A5 - 0x22]
  1036. 00000ACA  7024                     moveq.l    D0, 0x24
  1037. 00000ACC  D1C0                     add.l      A0, D0
  1038. 00000ACE  2448                     movea.l    A2, A0
  1039. 00000AD0  600E                     bra        +0x10 /* 00000AE0 */
  1040. label00000AD2:
  1041. 00000AD2  4A92                     tst.l      [A2]
  1042. 00000AD4  6708                     beq        +0xA /* 00000ADE */
  1043. 00000AD6  2F02                     move.l     -[A7], D2
  1044. 00000AD8  2052                     movea.l    A0, [A2]
  1045. 00000ADA  4E90                     jsr        [A0]
  1046. 00000ADC  588F                     addq.l     A7, 4
  1047. label00000ADE:
  1048. 00000ADE  598A                     subq.l     A2, 4
  1049. label00000AE0:
  1050. 00000AE0  206D FFDE                movea.l    A0, [A5 - 0x22]
  1051. 00000AE4  B5C8                     cmpa.l     A2, A0
  1052. 00000AE6  6200 FFEA                bhi        -0x14 /* 00000AD2 */
  1053. 00000AEA  206D FFEC                movea.l    A0, [A5 - 0x14]
  1054. 00000AEE  2142 000E                move.l     [A0 + 0xE], D2
  1055. 00000AF2  206D FFDE                movea.l    A0, [A5 - 0x22]
  1056. 00000AF6  2050                     movea.l    A0, [A0]
  1057. 00000AF8  4E90                     jsr        [A0]
  1058. 00000AFA  4CEE 0404 FFF8           movem.l    D2,A2, [A6 - 0x8]
  1059. 00000B00  4E5E                     unlink     A6
  1060. 00000B02  4E75                     rts
  1061. 00000B04  DF52                     add.w      [A2], D7
  1062. 00000B06  5445                     addq.w     D5, 2
  1063. 00000B08  5849                     addq.w     A1, 4
  1064. 00000B0A  5420                     addq.b     -[A0], 2
  1065. fn00000B0C:
  1066. 00000B0C  0C82 0000 FFFF           cmpi.l     D2, 0xFFFF
  1067. 00000B12  6218                     bhi        +0x1A /* 00000B2C */
  1068. 00000B14  3241                     movea.w    A1, D1
  1069. 00000B16  4241                     clr.w      D1
  1070. 00000B18  4841                     swap.w     D1
  1071. 00000B1A  82C2                     divu.w     D1, D2
  1072. 00000B1C  2001                     move.l     D0, D1
  1073. 00000B1E  4841                     swap.w     D1
  1074. 00000B20  3009                     move.w     D0, A1
  1075. 00000B22  80C2                     divu.w     D0, D2
  1076. 00000B24  3200                     move.w     D1, D0
  1077. 00000B26  4240                     clr.w      D0
  1078. 00000B28  4840                     swap.w     D0
  1079. 00000B2A  4E75                     rts
  1080. label00000B2C:
  1081. 00000B2C  2001                     move.l     D0, D1
  1082. 00000B2E  4240                     clr.w      D0
  1083. 00000B30  4840                     swap.w     D0
  1084. 00000B32  4841                     swap.w     D1
  1085. 00000B34  4241                     clr.w      D1
  1086. 00000B36  2242                     movea.l    A1, D2
  1087. 00000B38  740F                     moveq.l    D2, 0x0F
  1088. label00000B3A:
  1089. 00000B3A  D281                     add.l      D1, D1
  1090. 00000B3C  D180                     addx.l     D0, D0
  1091. 00000B3E  B3C0                     cmpa.l     A1, D0
  1092. 00000B40  6204                     bhi        +0x6 /* 00000B46 */
  1093. 00000B42  9089                     sub.l      D0, A1
  1094. 00000B44  5241                     addq.w     D1, 1
  1095. label00000B46:
  1096. 00000B46  51CA FFF2                dbf        D2, -0x10 /* 00000B3A */
  1097. 00000B4A  4E75                     rts
  1098. fn00000B4C:
  1099. 00000B4C  2F02                     move.l     -[A7], D2
  1100. 00000B4E  2401                     move.l     D2, D1
  1101. 00000B50  2200                     move.l     D1, D0
  1102. 00000B52  4A82                     tst.l      D2
  1103. 00000B54  6C02                     bge        +0x4 /* 00000B58 */
  1104. 00000B56  4482                     neg.l      D2
  1105. label00000B58:
  1106. 00000B58  7000                     moveq.l    D0, 0x00
  1107. 00000B5A  4A81                     tst.l      D1
  1108. 00000B5C  6C04                     bge        +0x6 /* 00000B62 */
  1109. 00000B5E  4481                     neg.l      D1
  1110. 00000B60  4680                     not.l      D0
  1111. label00000B62:
  1112. 00000B62  2040                     movea.l    A0, D0
  1113. 00000B64  4EBA FFA6                jsr        [PC - 0x5A /* 00000B0C */]
  1114. 00000B68  3408                     move.w     D2, A0
  1115. 00000B6A  6702                     beq        +0x4 /* 00000B6E */
  1116. 00000B6C  4480                     neg.l      D0
  1117. label00000B6E:
  1118. 00000B6E  241F                     move.l     D2, [A7]+
  1119. 00000B70  4E75                     rts
  1120. fn00000B72:
  1121. 00000B72  2F02                     move.l     -[A7], D2
  1122. 00000B74  2401                     move.l     D2, D1
  1123. 00000B76  2200                     move.l     D1, D0
  1124. 00000B78  7000                     moveq.l    D0, 0x00
  1125. 00000B7A  4A82                     tst.l      D2
  1126. 00000B7C  6C04                     bge        +0x6 /* 00000B82 */
  1127. 00000B7E  4482                     neg.l      D2
  1128. 00000B80  4680                     not.l      D0
  1129. label00000B82:
  1130. 00000B82  4A81                     tst.l      D1
  1131. 00000B84  6C04                     bge        +0x6 /* 00000B8A */
  1132. 00000B86  4481                     neg.l      D1
  1133. 00000B88  4680                     not.l      D0
  1134. label00000B8A:
  1135. 00000B8A  2040                     movea.l    A0, D0
  1136. 00000B8C  4EBA FF7E                jsr        [PC - 0x82 /* 00000B0C */]
  1137. 00000B90  2408                     move.l     D2, A0
  1138. 00000B92  6702                     beq        +0x4 /* 00000B96 */
  1139. 00000B94  4481                     neg.l      D1
  1140. label00000B96:
  1141. 00000B96  2001                     move.l     D0, D1
  1142. 00000B98  241F                     move.l     D2, [A7]+
  1143. 00000B9A  4E75                     rts
  1144. fn00000B9C:
  1145. 00000B9C  4E56 0000                link       A6, 0
  1146. 00000BA0  206E 0008                movea.l    A0, [A6 + 0x8]
  1147. 00000BA4  2248                     movea.l    A1, A0
  1148. 00000BA6  5289                     addq.l     A1, 1
  1149. 00000BA8  6000 0002                bra        +0x4 /* 00000BAC */
  1150. label00000BAC:
  1151. 00000BAC  4A18                     tst.b      [A0]+
  1152. 00000BAE  6600 FFFC                bne        -0x2 /* 00000BAC */
  1153. 00000BB2  91C9                     sub.l      A0, A1
  1154. 00000BB4  2008                     move.l     D0, A0
  1155. 00000BB6  4E5E                     unlink     A6
  1156. 00000BB8  4E75                     rts
  1157. 00000BBA  D354                     add.w      [A4], D1
  1158. 00000BBC  524C                     addq.w     A4, 1
  1159. 00000BBE  454E                     chk.w      D2, A6
  1160. 00000BC0  2020                     move.l     D0, -[A0]
  1161.